home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / clipper / clipmous.zip / CLIPMOUS.TXT < prev    next >
Text File  |  1992-03-25  |  2KB  |  51 lines
  1.                              CLIPMOUS.LIB
  2.                              ------------
  3.  
  4. CLIPMOUS.LIB is a simple library for mouse support under CLIPPER.
  5. It can be use with Summer '87, 5.0 and 5.01 version.  Source code of the
  6. CLIPMOUS library is written with Borland Turbo C 2.0.
  7.  
  8. Look at file MOUSTEST.PRG (included) for code example.
  9. ______________________________________________________________________________
  10.  
  11. Included functions are:
  12.  
  13.  
  14. Minit(): mouse initialisation (must be use at the begining of your program)
  15.         - return 1 if mouse is detected and correctly installed.
  16.         - return 0 if mouse is not detected.
  17.  
  18. Mend(): desinstall mouse (to use at the end of your program or sub)
  19.  
  20. Mshow(): turn on mouse cursor.
  21.  
  22. Mhide(): turn off mouse cursor.
  23.  
  24.  
  25. Mx(): column position of the mouse cursor
  26.         - return a value bettween 1 and 80.
  27.  
  28. My(): line position of the mouse cursor
  29.         - return a value bettween 1 and 25.
  30.  
  31. Mwait(): pause until a mouse button is pressed
  32.         - return 2 if the left button was pressed.
  33.         - return 8 if the right button was pressed.
  34.         - return 10 if both buttons was pressed.
  35.  
  36. Mbout(): return buttons status (initialized to 0 when moving)
  37.         - return 2 if left button is pressed
  38.         - return 4 if left button was released
  39.         - return 8 if right button is pressed
  40.         - return 16 if right button was released
  41.         - return 10 if both button are pressed
  42.         - return 20 if both buttons were released
  43.  
  44. Mlast(): return last buttons status (not initialized to 0 when moving)
  45.         - see Mbout() for returned values
  46.  
  47.  
  48. ______________________________________________________________________________
  49. Martin Brousseau
  50. proso@vm1.ulaval.ca
  51.